home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 270
- Top = 165
- Width = 266
- Height = 162
- Caption = 'Mostly Harmless...'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- PixelsPerInch = 96
- TextHeight = 13
- object bntAnswer: TButton
- Left = 8
- Top = 96
- Width = 97
- Height = 25
- Caption = 'Get The Answer'
- TabOrder = 0
- OnClick = bntAnswerClick
- end
- object btnQuestion: TButton
- Left = 144
- Top = 96
- Width = 105
- Height = 25
- Caption = 'Get The Question'
- TabOrder = 1
- OnClick = btnQuestionClick
- end
- object lbeAnswer: TLabeledEdit
- Left = 8
- Top = 24
- Width = 121
- Height = 21
- EditLabel.Width = 60
- EditLabel.Height = 13
- EditLabel.Caption = 'The Answer:'
- LabelPosition = lpAbove
- LabelSpacing = 3
- TabOrder = 2
- end
- object lbeQuestion: TLabeledEdit
- Left = 8
- Top = 64
- Width = 241
- Height = 21
- EditLabel.Width = 67
- EditLabel.Height = 13
- EditLabel.Caption = 'The Question:'
- LabelPosition = lpAbove
- LabelSpacing = 3
- TabOrder = 3
- end
- object HTTPRIO1: THTTPRIO
- WSDLLocation =
- 'http://DrBob42.TDMWeb.com/cgi-bin/WebService42.exe/wsdl/IHitchHi' +
- 'ker'
- Service = 'IHitchHikerservice'
- Port = 'IHitchHikerPort'
- HTTPWebNode.Agent = 'Borland SOAP 1.1'
- HTTPWebNode.UseUTF8InHeader = False
- Converter.Options = [soSendMultiRefObj, soTryAllSchema]
- Left = 176
- Top = 8
- end
- end
-